To use the plugin ( the way it was intended ) put the following code into a MouseDown event ( of a window, canvas object . . . ):
dim m as memoryBlock
m = newmemoryblock(4)
m.long(0) = DragWindow( w as window )
self.top = m.short(0)
self.left = m.short(2)
return true
"w" should usually be "self". The plugin function doesn't move your window, so you'll have to do that yourself. The funtion returns a C Point as an integer, and the code above shows you how to extract the horisontal and vertical values.
Note
This plugin was only tested on my own computer ( a G3 running OS8.5.1/8.6 ) - and I'm not a C/MacOSToolbox guru. Use it at you own risk.
- - - -
Please send comments, bug reports, feature requests to: